home *** CD-ROM | disk | FTP | other *** search
/ Chip: Hang es video / CHIP_ZENESZERKESZTO_2005.ISO / audio_3 / visual / robotfunk / setup.exe / {app} / main.dxr / Internal_61.ls < prev    next >
Encoding:
Text File  |  2003-11-19  |  3.2 KB  |  96 lines

  1. global curlink, connectlist, origconnectlist, linkfeedbacklist
  2.  
  3. on executeBranchingMenu menuName, commandName
  4.   put curlink
  5.   curchan = curlink[1]
  6.   if curchan > 0 then
  7.     curfader = curlink[2]
  8.     Ok = 1
  9.     case commandName of
  10.       "thisfader":
  11.         connectlist[curchan][curfader] = origconnectlist[curchan][curfader]
  12.       "blend1":
  13.         connectlist[curchan][curfader] = "blendlist[1]"
  14.       "blend2":
  15.         connectlist[curchan][curfader] = "blendlist[2]"
  16.       "blend3":
  17.         connectlist[curchan][curfader] = "blendlist[3]"
  18.       "blend4":
  19.         connectlist[curchan][curfader] = "blendlist[4]"
  20.       "blend5":
  21.         connectlist[curchan][curfader] = "blendlist[5]"
  22.       "fx11":
  23.         connectlist[curchan][curfader] = "sprite(82).props.faders[1]"
  24.       "fx21":
  25.         connectlist[curchan][curfader] = "sprite(82).props.faders[2]"
  26.       "fx31":
  27.         connectlist[curchan][curfader] = "sprite(82).props.faders[3]"
  28.       "fx41":
  29.         connectlist[curchan][curfader] = "sprite(82).props.faders[4]"
  30.       "fx12":
  31.         connectlist[curchan][curfader] = "sprite(83).props.faders[1]"
  32.       "fx22":
  33.         connectlist[curchan][curfader] = "sprite(83).props.faders[2]"
  34.       "fx32":
  35.         connectlist[curchan][curfader] = "sprite(83).props.faders[3]"
  36.       "fx42":
  37.         connectlist[curchan][curfader] = "sprite(83).props.faders[4]"
  38.       "fx13":
  39.         connectlist[curchan][curfader] = "sprite(84).props.faders[1]"
  40.       "fx23":
  41.         connectlist[curchan][curfader] = "sprite(84).props.faders[2]"
  42.       "fx33":
  43.         connectlist[curchan][curfader] = "sprite(84).props.faders[3]"
  44.       "fx43":
  45.         connectlist[curchan][curfader] = "sprite(84).props.faders[4]"
  46.       "fx14":
  47.         connectlist[curchan][curfader] = "sprite(85).props.faders[1]"
  48.       "fx24":
  49.         connectlist[curchan][curfader] = "sprite(85).props.faders[2]"
  50.       "fx34":
  51.         connectlist[curchan][curfader] = "sprite(85).props.faders[3]"
  52.       "fx44":
  53.         connectlist[curchan][curfader] = "sprite(85).props.faders[4]"
  54.       "LFO1":
  55.         connectlist[curchan][curfader] = "lfo1"
  56.       "LFO2":
  57.         connectlist[curchan][curfader] = "lfo2"
  58.       "fft1":
  59.         connectlist[curchan][curfader] = "values[1]"
  60.       "fft2":
  61.         connectlist[curchan][curfader] = "values[2]"
  62.       "fft3":
  63.         connectlist[curchan][curfader] = "values[3]"
  64.       "fft4":
  65.         connectlist[curchan][curfader] = "values[4]"
  66.       "fft5":
  67.         connectlist[curchan][curfader] = "values[5]"
  68.       "fft6":
  69.         connectlist[curchan][curfader] = "values[6]"
  70.       "fft7":
  71.         connectlist[curchan][curfader] = "values[7]"
  72.       "fft8":
  73.         connectlist[curchan][curfader] = "values[8]"
  74.       "fft9":
  75.         connectlist[curchan][curfader] = "values[9]"
  76.       "mastertime":
  77.         connectlist[curchan][curfader] = "timenow"
  78.       "chantime":
  79.         connectlist[curchan][curfader] = "sprite(" & string(101 + curchan) & ").val"
  80.       otherwise:
  81.         linkfeedbacklist[curchan][curfader] = "       "
  82.         Ok = 0
  83.     end case
  84.   end if
  85.   if Ok then
  86.     linkfeedbacklist[curchan][curfader] = commandName
  87.   end if
  88. end
  89.  
  90. on popmenu chan, fxnum
  91.   curlink = [chan, fxnum]
  92.   sprite(299).locV = min(412, the mouseV)
  93.   sprite(299).locH = the mouseH + 12
  94.   sprite(299).visible = 1
  95. end
  96.